package com.ruoyi.system.service.impl;

import java.util.ArrayList;
import java.util.Arrays;
import java.util.Iterator;
import java.util.List;
import java.util.stream.Collectors;

import com.ruoyi.common.core.domain.entity.SysDeopCycle;
import com.ruoyi.common.utils.file.ImageUtils;
import com.ruoyi.system.domain.DetectionCycle;
import com.ruoyi.system.domain.vo.SyDeptVo;
import com.ruoyi.system.service.IDetectionCycleService;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import com.ruoyi.common.annotation.DataScope;
import com.ruoyi.common.constant.UserConstants;
import com.ruoyi.common.core.domain.TreeSelect;
import com.ruoyi.common.core.domain.entity.SysDept;
import com.ruoyi.common.core.domain.entity.SysRole;
import com.ruoyi.common.core.domain.entity.SysUser;
import com.ruoyi.common.core.text.Convert;
import com.ruoyi.common.exception.ServiceException;
import com.ruoyi.common.utils.SecurityUtils;
import com.ruoyi.common.utils.StringUtils;
import com.ruoyi.common.utils.spring.SpringUtils;
import com.ruoyi.system.mapper.SysDeptMapper;
import com.ruoyi.system.mapper.SysRoleMapper;
import com.ruoyi.system.service.ISysDeptService;

import static com.ruoyi.common.utils.SecurityUtils.getUsername;

/**
 * 部门管理 服务实现
 *
 * @author ruoyi
 */
@Service
public class SysDeptServiceImpl implements ISysDeptService {
    @Autowired
    private SysDeptMapper deptMapper;

    @Autowired
    private SysRoleMapper roleMapper;

    private static final Logger log = LoggerFactory.getLogger(ImageUtils.class);

    @Autowired
    private IDetectionCycleService iDetectionCycleService;

    /**
     * 查询部门管理数据
     *
     * @param dept 部门信息
     * @return 部门信息集合
     */
    @Override
    @DataScope(deptAlias = "d")
    public List<SysDept> selectDeptList(SysDept dept) {
        return deptMapper.selectDeptList(dept);
    }

    /**
     * 构建前端所需要树结构
     *
     * @param depts 部门列表
     * @return 树结构列表
     */
    @Override
    public List<SysDept> buildDeptTree(List<SysDept> depts) {
        List<SysDept> returnList = new ArrayList<SysDept>();
        List<Long> tempList = new ArrayList<Long>();
        for (SysDept dept : depts) {
            tempList.add(dept.getDeptId());
        }
        for (SysDept dept : depts) {
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (!tempList.contains(dept.getParentId())) {
                recursionFn(depts, dept);
                returnList.add(dept);
            }
        }
        if (returnList.isEmpty()) {
            returnList = depts;
        }
        return returnList;
    }

    /**
     * 构建前端所需要下拉树结构
     *
     * @param depts 部门列表
     * @return 下拉树结构列表
     */
    @Override
    public List<TreeSelect> buildDeptTreeSelect(List<SysDept> depts) {
        List<SysDept> deptTrees = buildDeptTree(depts);
        return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    /**
     * 根据角色ID查询部门树信息
     *
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    @Override
    public List<Long> selectDeptListByRoleId(Long roleId) {
        SysRole role = roleMapper.selectRoleById(roleId);
        return deptMapper.selectDeptListByRoleId(roleId, role.isDeptCheckStrictly());
    }

    /**
     * 根据部门ID查询信息
     *
     * @param deptId 部门ID
     * @return 部门信息
     */
    @Override
    public SysDept selectDeptById(Long deptId) {
        SysDept sysDept = deptMapper.selectDeptById(deptId);
        //查询该行业关联的类别id
        List<SysDeopCycle> sysDeopCycles = deptMapper.selectDeptCycleById(deptId);
        Long[] longs = new Long[sysDeopCycles.size()];
        for (int a = 0; a < sysDeopCycles.size(); a++) {
            longs[a] = sysDeopCycles.get(a).getCycleId();
        }
        sysDept.setCycle(longs);
        return sysDept;
    }

    /**
     * 根据ID查询所有子部门（正常状态）
     *
     * @param deptId 部门ID
     * @return 子部门数
     */
    @Override
    public int selectNormalChildrenDeptById(Long deptId) {
        return deptMapper.selectNormalChildrenDeptById(deptId);
    }

    /**
     * 是否存在子节点
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public boolean hasChildByDeptId(Long deptId) {
        int result = deptMapper.hasChildByDeptId(deptId);
        return result > 0;
    }

    /**
     * 查询部门是否存在用户
     *
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistUser(Long deptId) {
        int result = deptMapper.checkDeptExistUser(deptId);
        return result > 0;
    }

    /**
     * 查询部门是否存在重点人群
     *
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistPerson(Long deptId) {
        int result = deptMapper.checkDeptExistPerson(deptId);
        return result > 0;
    }

    /**
     * 校验部门名称是否唯一
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public String checkDeptNameUnique(SysDept dept) {
        Long deptId = StringUtils.isNull(dept.getDeptId()) ? -1L : dept.getDeptId();
        SysDept info = deptMapper.checkDeptNameUnique(dept.getDeptName(), dept.getParentId());
        if (StringUtils.isNotNull(info) && info.getDeptId().longValue() != deptId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验部门是否有数据权限
     *
     * @param deptId 部门id
     */
    @Override
    public void checkDeptDataScope(Long deptId) {
        if (!SysUser.isAdmin(SecurityUtils.getUserId())) {
            SysDept dept = new SysDept();
            dept.setDeptId(deptId);
            List<SysDept> depts = SpringUtils.getAopProxy(this).selectDeptList(dept);
            if (StringUtils.isEmpty(depts)) {
                throw new ServiceException("没有权限访问部门数据！");
            }
        }
    }

    /**
     * 新增保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int insertDept(SysDept dept) {
        SysDept info = deptMapper.selectDeptById(dept.getParentId());
        // 如果父节点不为正常状态,则不允许新增子节点
        if (!UserConstants.DEPT_NORMAL.equals(info.getStatus())) {
            throw new ServiceException("部门停用，不允许新增");
        }
        dept.setAncestors(info.getAncestors() + "," + dept.getParentId());
        deptMapper.insertDept(dept);
        Long[] cycle = dept.getCycle(); //多个类别id
        if (StringUtils.isNotNull(cycle) && cycle.length > 0) {
            for (int a = 0; a < cycle.length; a++) {
                deptMapper.insertDeptCycle(new SysDeopCycle(dept.getDeptId(), cycle[a]));
            }
        }
        return 1;
    }

    /**
     * 修改保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int updateDept(SysDept dept) {
        SysDept newParentDept = deptMapper.selectDeptById(dept.getParentId());
        SysDept oldDept = deptMapper.selectDeptById(dept.getDeptId());
        if (StringUtils.isNotNull(newParentDept) && StringUtils.isNotNull(oldDept)) {
            String newAncestors = newParentDept.getAncestors() + "," + newParentDept.getDeptId();
            String oldAncestors = oldDept.getAncestors();
            dept.setAncestors(newAncestors);
            updateDeptChildren(dept.getDeptId(), newAncestors, oldAncestors);
        }
        int result = deptMapper.updateDept(dept);
        if (UserConstants.DEPT_NORMAL.equals(dept.getStatus()) && StringUtils.isNotEmpty(dept.getAncestors()) && !StringUtils.equals("0", dept.getAncestors())) {
            // 如果该部门是启用状态，则启用该部门的所有上级部门
            updateParentDeptStatusNormal(dept);
        }
        //修改类别
        deptMapper.deleteDeptCycle(dept.getDeptId());
        Long[] cycle = dept.getCycle();
        if (StringUtils.isNotNull(cycle) && cycle.length > 0) {
            for (int a = 0; a < cycle.length; a++) {
                deptMapper.insertDeptCycle(new SysDeopCycle(dept.getDeptId(), cycle[a]));
            }
        }
        return result;
    }

    /**
     * 插叙该部门下类别是否被其他下级部门引用
     *
     * @param dept 当前部门
     */
    public String selectNormalChildrenDeptDetectionCycleById(SysDept dept) {
        //查询所有部门类别关联关系
        //要修改的类别id
        Long[] cycle = dept.getCycle();
        //查询当前部门的所有下级部门
        List<SysDept> sysDepts = deptMapper.selectDeptListAll(dept.getDeptId());
        for (SysDept sysDept : sysDepts) {
            if (sysDept.getDeptId() == dept.getDeptId()) {
                continue;
            }
            List<SysDeopCycle> sysDeopCycles1 = deptMapper.selectDeptCycleById(sysDept.getDeptId());
            int Js = 0;
            for (SysDeopCycle sysDeopCycle : sysDeopCycles1) {
                Long cycleId = sysDeopCycle.getCycleId();
                for (int c = 0; c < cycle.length; c++) {
                    if (cycleId == cycle[c]) {
                        ++Js;
                    }
                }
            }
            if (Js != sysDeopCycles1.size()) {
                return UserConstants.NOT_UNIQUE;
            }
        }
        return UserConstants.UNIQUE;
    }


    public String selectDeptIdCount(SysDept dept) {
        if (deptMapper.selectDeptIdCount(dept.getParentId()) > 0) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }


    /**
     * 插叙该部门下类别是否被其他下级部门引用
     *
     * @param dept 当前部门
     */
    public String selectNormalChildrenPersonById(SysDept dept) {
        //要修改的类别id
        Long[] cycle = dept.getCycle();
        List<SysDeopCycle> sysDeopCycles = deptMapper.selectDeptCycleById(dept.getDeptId());
        //那个类别id被重点人群引用了
        List<Long> list = new ArrayList();
        for (SysDeopCycle sys : sysDeopCycles) {
            int i = deptMapper.selectDeptPerson(sys.getCycleId(), dept.getDeptId());
            if (i > 0) {
                list.add(sys.getCycleId());
            }
        }
        int d = 0;
        for (int c = 0; c < cycle.length; c++) {
            for (int a = 0; a < list.size(); a++) {
                if (list.get(a) == cycle[c]) {
                    ++d;
                    break;
                }
            }
        }
        if (d != list.size()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }


    /**
     * 修改该部门的父级部门状态
     *
     * @param dept 当前部门
     */
    private void updateParentDeptStatusNormal(SysDept dept) {
        String ancestors = dept.getAncestors();
        Long[] deptIds = Convert.toLongArray(ancestors);
        deptMapper.updateDeptStatusNormal(deptIds);
    }

    /**
     * 修改子元素关系
     *
     * @param deptId       被修改的部门ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    public void updateDeptChildren(Long deptId, String newAncestors, String oldAncestors) {
        List<SysDept> children = deptMapper.selectChildrenDeptById(deptId);
        for (SysDept child : children) {
            child.setAncestors(child.getAncestors().replaceFirst(oldAncestors, newAncestors));
        }
        if (children.size() > 0) {
            deptMapper.updateDeptChildren(children);
        }
    }

    /**
     * 删除部门管理信息
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public int deleteDeptById(Long deptId) {
        deptMapper.deleteDeptCycle(deptId);
        return deptMapper.deleteDeptById(deptId);
    }

    /**
     * 递归列表
     */
    private void recursionFn(List<SysDept> list, SysDept t) {
        // 得到子节点列表
        List<SysDept> childList = getChildList(list, t);
        t.setChildren(childList);
        for (SysDept tChild : childList) {
            if (hasChild(list, tChild)) {
                recursionFn(list, tChild);
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<SysDept> getChildList(List<SysDept> list, SysDept t) {
        List<SysDept> tlist = new ArrayList<SysDept>();
        Iterator<SysDept> it = list.iterator();
        while (it.hasNext()) {
            SysDept n = (SysDept) it.next();
            if (StringUtils.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getDeptId().longValue()) {
                tlist.add(n);
            }
        }
        return tlist;
    }


    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<SysDept> list, SysDept t) {
        return getChildList(list, t).size() > 0;
    }

    /**
     * 导入用户数据
     *
     * @param isUpdateSupport 是否更新支持，如果已存在，则进行更新数据
     * @return 结果
     */
    @Override
    public String imporPerson(List<SyDeptVo> syDeptVoList, Boolean isUpdateSupport) {
        if (StringUtils.isNull(syDeptVoList) || syDeptVoList.size() == 0) {
            throw new ServiceException("导入用户数据不能为空！");
        }
        int successNum = 0;
        int failureNum = 0;
        StringBuilder successMsg = new StringBuilder();
        StringBuilder failureMsg = new StringBuilder();
        List<List<String>> listAll = new ArrayList();
        String name = "";
        Long deptid = null;
        try {
            //导入的第一级跟数据库中的第一级是否匹配
            SysDept sysDept3 = deptMapper.selectdeptidJb();
            for (SyDeptVo syDeptVo : syDeptVoList) {
                Long deptId = sysDept3.getDeptId();
                if (StringUtils.isNotNull(syDeptVo.getDeptNane()) && StringUtils.isNotNull(syDeptVo.getCycleName())) {
                    String[] DeptNanes = syDeptVo.getDeptNane().split("-");
                    String[] CycleNames = syDeptVo.getCycleName().split("-");
                    if (DeptNanes.length == CycleNames.length) {
                        for (int a = 0; a < DeptNanes.length; a++) {
                            name = DeptNanes[a];
                            //判断第一级跟导入的第一级是否匹配
                            if (a == 0 && !sysDept3.getDeptName().equals(DeptNanes[a])) {
                                failureNum++;
                                failureMsg.append("<br/>" + failureNum + "导入的第一级:" + DeptNanes[a] + "-跟当前第一级:" + sysDept3.getDeptName() + "-不匹配");
                                break;
                            } else {
                                if (a == 0 && sysDept3.getDeptName().equals(DeptNanes[a])) {
                                    continue;
                                }
                                //查询类别id
                                DetectionCycle detectionCycle = new DetectionCycle();
                                detectionCycle.setDeptId(deptId);
                                List<DetectionCycle> detectionCycles = iDetectionCycleService.selectDetectionCycleList(detectionCycle);
                                //同级别部门
                                List<SysDept> sysDepts = deptMapper.selectParentId(deptId);
                                int orderNum = -1; //  显示顺序
                                //匹配成功的那一级数据
                                SysDept sysDept = deptMapper.selectDeptById(deptId);
                                if (sysDepts.size() > 0) {
                                    for (int c = 0; c < sysDepts.size(); c++) {
                                        String deptName = sysDepts.get(c).getDeptName();
                                        if (deptName.equals(DeptNanes[a])) {
                                            //匹配到第二级别则执行下一级
                                            deptId = sysDepts.get(c).getDeptId();
                                            break;
                                        }
                                        //拿到最大的顺序
                                        if (Integer.parseInt(sysDepts.get(c).getOrderNum()) > orderNum) {
                                            orderNum = Integer.parseInt(sysDepts.get(c).getOrderNum());
                                        }
                                        //循环完下级没有匹配的下级则新增
                                        if ((c + 1) == sysDepts.size()) {
                                            SysDept initsysDept = new SysDept();
                                            initsysDept.setDeptName(DeptNanes[a]);
                                            initsysDept.setParentId(sysDept.getDeptId());
                                            initsysDept.setOrderNum((orderNum + 1) + ""); //顺序当前最大值加一
                                            initsysDept.setAncestors(sysDept.getAncestors() + "," + sysDept.getDeptId());
                                            initsysDept.setCreateBy(getUsername()); //创建人
                                            deptMapper.insertDept(initsysDept);
                                            deptid = initsysDept.getDeptId();
                                            //类别匹配-----------------------
                                            List<Long> list = new ArrayList();
                                            String[] split = CycleNames[a].substring(1, CycleNames[a].length() - 1).split(",");
                                            for (int k = 0; k < split.length; k++) {
                                                for (int b = 0; b < detectionCycles.size(); b++) {
                                                    String categoryName = detectionCycles.get(b).getCategoryName();
                                                    String s = split[k];
                                                    if (categoryName.equals(s)) {
                                                        list.add(detectionCycles.get(b).getId());
                                                        break;
                                                    }
                                                }
                                            }
                                            if (list.size() == split.length) {
                                                //匹配成功执行保存
                                                for (int k = 0; k < list.size(); k++) {
                                                    deptMapper.insertDeptCycle(new SysDeopCycle(initsysDept.getDeptId(), list.get(k)));
                                                }
                                                deptId = initsysDept.getDeptId();
                                            } else {
                                                deptMapper.deleteDeptById(deptid);
                                                failureNum++;
                                                failureMsg.append("<br/>导入的部门层级和类别层级不匹配不匹配");
                                                break;
                                            }
                                            successNum++;
                                            successMsg.append("<br/>" + successNum + "、名称： " + DeptNanes[a] + " 导入成功");
                                        }
                                    }
                                } else {
                                    SysDept initsysDept = new SysDept();
                                    initsysDept.setDeptName(DeptNanes[a]);
                                    initsysDept.setParentId(sysDept.getDeptId());
                                    initsysDept.setOrderNum("1"); //顺序当前最大值加一
                                    initsysDept.setAncestors(sysDept.getAncestors() + "," + sysDept.getDeptId());
                                    initsysDept.setCreateBy(getUsername()); //创建人
                                    deptMapper.insertDept(initsysDept);
                                    deptid = initsysDept.getDeptId();
                                    //类别匹配-----------------------
                                    List<Long> list = new ArrayList();
                                    String[] split = CycleNames[a].substring(1, CycleNames[a].length() - 1).split(",");
                                    for (int k = 0; k < split.length; k++) {
                                        for (int b = 0; b < detectionCycles.size(); b++) {
                                            String categoryName = detectionCycles.get(b).getCategoryName();
                                            String s = split[k];
                                            if (categoryName.equals(s)) {
                                                list.add(detectionCycles.get(b).getId());
                                                break;
                                            }
                                        }
                                    }
                                    if (list.size() == split.length) {
                                        //匹配成功执行保存
                                        for (int k = 0; k < list.size(); k++) {
                                            deptMapper.insertDeptCycle(new SysDeopCycle(initsysDept.getDeptId(), list.get(k)));
                                        }
                                        deptId = initsysDept.getDeptId();
                                    } else {
                                        deptMapper.deleteDeptById(deptid);
                                        failureNum++;
                                        failureMsg.append("<br/>导入的部门层级和类别层级不匹配不匹配");
                                        break;
                                    }
                                    successNum++;
                                    successMsg.append("<br/>" + successNum + "、名称： " + DeptNanes[a] + " 导入成功");
                                }


                            }
                        }
                    } else {
                        failureNum++;
                        failureMsg.append("<br/>" + failureNum + "导入的部门层级和类别层级不匹配");
                        break;
                    }

                }
            }
        } catch (Exception e) {
            deptMapper.deleteDeptById(deptid);
            deptMapper.deleteDeptCycle(deptid);
            failureNum++;
            String msg = "<br/>" + failureNum + "、名称： " + name + " 导入失败：";
            failureMsg.append(msg + e.getMessage());
            log.error(msg, e);
        }
        if (failureNum > 0) {
            failureMsg.insert(0, "很抱歉，导入失败！共 " + failureNum + " 条数据格式不正确，错误如下：");
            throw new ServiceException(failureMsg.toString());
        } else {
            successMsg.insert(0, "恭喜您，数据已全部导入成功！共 " + successNum + " 条，数据如下：");
        }
        return successMsg.toString();
    }

}
